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Appendix D 



i 



• ***** LCD PANEL ***** 
' PIC16F819 



'* SET UP BASIC ENVIRONMENT 

DEFINE CHARJPACING 1000 



1 PORTA. 0 
' PORTA . 1 
• PORTA. 2 
1 PORTA. 3 
» PORTA. 4 
' PORTA. 5 



CURRENT SENSE 
POT 

THERMISTOR 
VOLTAGE SENSE 



PORTB.O = 
PORTB.l = 
PORTB.2 « 
PORTB.3 - 
PORTB.4 * 

PORTB.5 - 
PORTB.6 = 
» PORTB.7 - 



NPN 
PNP 



t * 

' * ENVIRONMENT 
» * 



DEFINE CHAR PACING 1000 



» * 

'* VARIABLES 
» * 

************************************** 



N 


VAR 


BYTE 




BANK0 


X 


VAR 


BYTE 






y 


VAR 


BYTE 






Z 


VAR 


BYTE 






X2 


VAR 


WORD 




BANK0 




VAR 


WORD 






MISCF 


VAR 


BYTE 




BANK0 


LCNT 


VAR 


BYTE 






VOLTS 


VAR 


WORD 




■ BANK0 


VOUT 


VAR 


WORD 




BANK0 


CURRENT 


VAR 


WORD 




BANK0 


AMP 


VAR 


WORD 




BANK0 


TEMP 


VAR 


WORD 






ALCOP 


VAR 


BYTE 






ELOOP 


VAR 


BYTE 






PVOLT 


VAR 


BYTE 




BANK0 


BUCK 


VAR 


BYTE 






ssave 


VAR 


BYTE BANK0 


SYSTEM 


psave 


VAR 


BYTE BANK0 


SYSTEM 


isr 1 


VAR 


BYTE BANK0 


SYSTEM 


icnt 


VAR 


BYTE BANK0 


SYSTEM 


wsave 


VAR 


BYTE $20 


SYSTEM 


wsavel 


VAR 


BYTE SAO 


SYSTEM 



************************* ************* 
I * 



START OF PROGRAM 



